|
100
|
How can I remove a bookmark
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.Bookmark(2) = True
.Bookmark(2) = False
.BookmarkWidth = 16
End With
End Function
</SCRIPT>
</BODY>
|
|
99
|
How can I remove all bookmarks
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.Bookmark(2) = True
.Bookmark(4) = True
.BookmarkWidth = 16
.ClearBookmarks
End With
End Function
</SCRIPT>
</BODY>
|
|
98
|
How can I add a bookmark
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.Bookmark(2) = True
.Bookmark(4) = True
.BookmarkWidth = 16
End With
End Function
</SCRIPT>
</BODY>
|
|
97
|
How can I change the format to display the numbers
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.FormatNumbers = "<b><fgcolor=FF0000> </fgcolor></b>"
.InsertText "Just numbers: 12 22\r\n",1
End With
End Function
</SCRIPT>
</BODY>
|
|
96
|
Is there any option to change the color for the line that displays the cursor or the caret
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.BackColorCaretLine = RGB(255,0,0)
End With
End Function
</SCRIPT>
</BODY>
|
|
95
|
Can I display the lines using an alternate color
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.BackColorAlternate = RGB(255,0,0)
End With
End Function
</SCRIPT>
</BODY>
|
|
94
|
How can I disable or enable displaying the Replace dialog
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.AllowReplace = False
End With
End Function
</SCRIPT>
</BODY>
|
|
93
|
Does your control support incrementasl search
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.AllowIncrementalSearch = True
End With
End Function
</SCRIPT>
</BODY>
|
|
92
|
How can I programmatically find or search for a word only
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.HideSelection = False
.Find "IDD_DIALOG_INSTALL",2
End With
End Function
</SCRIPT>
</BODY>
|
|
91
|
How can I programmatically find or search for a string
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.HideSelection = False
.Find "public",0
End With
End Function
</SCRIPT>
</BODY>
|
|
90
|
How can I disable or enabled the Find dialog
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.AllowFind = False
End With
End Function
</SCRIPT>
</BODY>
|
|
89
|
How can I enable my button as the control can perform an REDO operation
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
var_CanRedo = .CanRedo
End With
End Function
</SCRIPT>
</BODY>
|
|
88
|
How can I enable my button as the control can perform an UNDO operation
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
var_CanUndo = .CanUndo
End With
End Function
</SCRIPT>
</BODY>
|
|
87
|
How can I disable or enable the undo-redo feature
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.AllowUndoRedo = False
End With
End Function
</SCRIPT>
</BODY>
|
|
86
|
How can I change the color for the border where the line numbers are displayed
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.LineNumberForeColor = RGB(255,0,0)
.LineNumberBackColor = RGB(0,0,255)
.LineNumberWidth = 32
End With
End Function
</SCRIPT>
</BODY>
|
|
85
|
How can I change the color of the bookmark border
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.BookMarkBackColor = RGB(255,0,0)
.BookMarkBackColor2 = RGB(255,0,0)
.BookmarkWidth = 16
End With
End Function
</SCRIPT>
</BODY>
|
|
84
|
How can I refresh the control
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.AddKeyword "<b>class</b>","this is a bit of text that's shown when the cursor hovers the <b>class</b> keyword.","exontrol.edit"
.Refresh
End With
End Function
</SCRIPT>
</BODY>
|
|
83
|
How can I change the size of the tabs characters
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.TabLength = 8
End With
End Function
</SCRIPT>
</BODY>
|
|
82
|
I've seen that if I press CTRL + ( I get the matching braket. How can I extend this
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.OpenBrackets = "<"
.CloseBrackets = ">"
End With
End Function
</SCRIPT>
</BODY>
|
|
81
|
How can I hide the selection
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.DisplaySelection = False
End With
End Function
</SCRIPT>
</BODY>
|
|
80
|
How can I display both scroll bars
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.ScrollBars = 3
End With
End Function
</SCRIPT>
</BODY>
|
|
79
|
How can I display only the vertical scroll bar
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.ScrollBars = 2
End With
End Function
</SCRIPT>
</BODY>
|
|
78
|
How can I display only the horizontal scroll bar
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.ScrollBars = 1
End With
End Function
</SCRIPT>
</BODY>
|
|
77
|
How can I hide the control's scroll bars
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.ScrollBars = 0
End With
End Function
</SCRIPT>
</BODY>
|
|
76
|
How can I insert at specified position a new line
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.InsertText "newline\r\n",2
.BackColorLine(2) = RGB(255,0,0)
End With
End Function
</SCRIPT>
</BODY>
|
|
75
|
How can I remove or delete all lines
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.Text = ""
End With
End Function
</SCRIPT>
</BODY>
|
|
74
|
How can I remove or delete a line
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.DeleteLine 1
End With
End Function
</SCRIPT>
</BODY>
|
|
73
|
How do I change the character where the caret or the cursor is displayed
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.CaretPos = 10
End With
End Function
</SCRIPT>
</BODY>
|
|
72
|
How do I change the line where the caret or the cursor is displayed
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.CaretLine = 10
End With
End Function
</SCRIPT>
</BODY>
|
|
71
|
How do I replace a line
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.TextLine(1) = "new line"
End With
End Function
</SCRIPT>
</BODY>
|
|
70
|
How do I get a line
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.TextLine(1) = "new line"
End With
End Function
</SCRIPT>
</BODY>
|
|
69
|
How do I get the number of lines in the control
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
var_Count = .Count
End With
End Function
</SCRIPT>
</BODY>
|
|
68
|
How do I get the point where the selection starts
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.SelStart = 4
.SelLength = 10
.HideSelection = False
End With
End Function
</SCRIPT>
</BODY>
|
|
67
|
How do I get the number of selected characters
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.SelLength = 10
.HideSelection = False
End With
End Function
</SCRIPT>
</BODY>
|
|
66
|
How can I get the selected text
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.SelLength = 10
var_SelText = .SelText
End With
End Function
</SCRIPT>
</BODY>
|
|
65
|
How can I replace the selected text
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.SelLength = 10
.SelText = "-new selection-"
End With
End Function
</SCRIPT>
</BODY>
|
|
64
|
How can I avoid changing the colors for keywords or expressions
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.ApplyColors = False
.AddKeyword "<fgcolor=FF0000><b>class</b></fgcolor>","this is a bit of text that's shown when the cursor hovers the <b>class</b> keyword.","exontrol.edit"
.Refresh
End With
End Function
</SCRIPT>
</BODY>
|
|
63
|
How can I display HTML text
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.EditType = 2
.Text = "<b>just a HTML text</b>\r\nnew <s>line</s>"
End With
End Function
</SCRIPT>
</BODY>
|
|
62
|
How can I use it a a simple edit control, without highlighting
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.EditType = 0
End With
End Function
</SCRIPT>
</BODY>
|
|
61
|
How can I save the text to a file
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
End Function
</SCRIPT>
</BODY>
|
|
60
|
How can I save the text to a file
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
End Function
</SCRIPT>
</BODY>
|
|
59
|
How can I load text from a file
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
End Function
</SCRIPT>
</BODY>
|
|
58
|
How can I load text from a file
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
End Function
</SCRIPT>
</BODY>
|
|
57
|
How can I display only a single line
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.MultiLine = False
End With
End Function
</SCRIPT>
</BODY>
|
|
56
|
How can I disable displaying multiple lines
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.MultiLine = False
End With
End Function
</SCRIPT>
</BODY>
|
|
55
|
How can change the color for selected text
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.HideSelection = False
.SelLength = 10
.SelBackColor = RGB(255,0,0)
End With
End Function
</SCRIPT>
</BODY>
|
|
54
|
How can change the color for selected text
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.HideSelection = False
.SelLength = 10
.SelForeColor = RGB(255,0,0)
End With
End Function
</SCRIPT>
</BODY>
|
|
53
|
How can I disable displaying the control's context menu
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.AllowContextMenu = False
End With
End Function
</SCRIPT>
</BODY>
|
|
52
|
Is there any option to hide the caret or the cursor
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.ShowCaret = False
End With
End Function
</SCRIPT>
</BODY>
|
|
51
|
How can still display the selected text when the control loses the focus
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.HideSelection = False
.SelLength = 10
End With
End Function
</SCRIPT>
</BODY>
|
|
50
|
How can I disable adding new TAB characters when the user enters a new line
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.AutoIndent = False
End With
End Function
</SCRIPT>
</BODY>
|
|
49
|
How can I disable using the Tab key
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.UseTabKey = False
End With
End Function
</SCRIPT>
</BODY>
|
|
48
|
How can I hide the number of each line
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.LineNumberWidth = 0
End With
End Function
</SCRIPT>
</BODY>
|
|
47
|
How can I display or show the number of each line
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.LineNumberWidth = 32
End With
End Function
</SCRIPT>
</BODY>
|
|
46
|
How can I clear the text
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.Text = ""
End With
End Function
</SCRIPT>
</BODY>
|
|
45
|
How can I specify the text being displayed in the control
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.Text = "new line\r\nnew line"
End With
End Function
</SCRIPT>
</BODY>
|
|
44
|
How can I hide the bookmark border
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.BookmarkWidth = 0
End With
End Function
</SCRIPT>
</BODY>
|
|
43
|
How can I show the bookmark border
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.BookmarkWidth = 16
End With
End Function
</SCRIPT>
</BODY>
|
|
42
|
How do I lock the control
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.Locked = True
End With
End Function
</SCRIPT>
</BODY>
|
|
41
|
How do I disable or enable the control
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.Enabled = False
End With
End Function
</SCRIPT>
</BODY>
|
|
40
|
How can I change the visual appearance of the splitter
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.AllowSplitter = 3
.SplitPaneWidth = 128
.SplitPaneHeight = 128
.VisualAppearance.Add 1,"c:\exontrol\images\normal.ebn"
.VisualAppearance.Add 2,"c:\exontrol\images\pushed.ebn"
.Background(0) = &H1000000
.Background(1) = &H1000000
.Background(2) = &H2000000
End With
End Function
</SCRIPT>
</BODY>
|
|
39
|
How can I change the visual appearance of the vertical splitter
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.AllowSplitter = 3
.SplitPaneWidth = 128
.VisualAppearance.Add 1,"c:\exontrol\images\normal.ebn"
.Background(0) = &H1000000
End With
End Function
</SCRIPT>
</BODY>
|
|
38
|
How can I change the visual appearance of the horizontal splitter
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.AllowSplitter = 3
.SplitPaneHeight = 128
.VisualAppearance.Add 1,"c:\exontrol\images\normal.ebn"
.Background(1) = &H1000000
End With
End Function
</SCRIPT>
</BODY>
|
|
37
|
How do I change the visual aspect for thumb parts in the scroll bars, using EBN
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.VisualAppearance.Add 1,"c:\exontrol\images\normal.ebn"
.VisualAppearance.Add 2,"c:\exontrol\images\pushed.ebn"
.VisualAppearance.Add 3,"c:\exontrol\images\hot.ebn"
.Background(388) = &H1000000
.Background(389) = &H2000000
.Background(391) = &H3000000
.Background(260) = &H1000000
.Background(261) = &H2000000
.Background(263) = &H3000000
End With
End Function
</SCRIPT>
</BODY>
|
|
36
|
How do I change the visual aspect only for the thumb in the scroll bar, using EBN
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.VisualAppearance.Add 1,"c:\exontrol\images\normal.ebn"
.VisualAppearance.Add 2,"c:\exontrol\images\pushed.ebn"
.VisualAppearance.Add 3,"c:\exontrol\images\hot.ebn"
.Background(388) = &H1000000
.Background(389) = &H2000000
.Background(391) = &H3000000
.ScrollThumbSize(1) = 96
End With
End Function
</SCRIPT>
</BODY>
|
|
35
|
I've seen that you can change the visual appearance for the scroll bar. How can I do that
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.VisualAppearance.Add 1,"c:\exontrol\images\normal.ebn"
.VisualAppearance.Add 2,"c:\exontrol\images\pushed.ebn"
.VisualAppearance.Add 3,"c:\exontrol\images\hot.ebn"
.Background(324) = &H1000000
.Background(325) = &H2000000
.Background(327) = &H3000000
.Background(404) = RGB(240,240,240)
.Background(276) = RGB(240,240,240)
.Background(3) = RGB(240,240,240)
End With
End Function
</SCRIPT>
</BODY>
|
|
34
|
Can I change the forecolor for the tooltip
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.ToolTipDelay = 1
.ToolTipWidth = 364
.Background(66) = RGB(255,0,0)
.AddKeyword "<b>class</b>","this is a bit of text that's shown when the cursor hovers the <b>class</b> keyword.","exontrol.edit"
.Refresh
End With
End Function
</SCRIPT>
</BODY>
|
|
33
|
Can I change the background color for the tooltip
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.ToolTipDelay = 1
.ToolTipWidth = 364
.Background(65) = RGB(255,0,0)
.AddKeyword "<b>class</b>","this is a bit of text that's shown when the cursor hovers the <b>class</b> keyword.","exontrol.edit"
.Refresh
End With
End Function
</SCRIPT>
</BODY>
|
|
32
|
Can I change the default border of the tooltip, using your EBN files
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.ToolTipDelay = 1
.ToolTipWidth = 364
.VisualAppearance.Add 1,"c:\exontrol\images\normal.ebn"
.Background(64) = &H1000000
.AddKeyword "<b>class</b>","this is a bit of text that's shown when the cursor hovers the <b>class</b> keyword.","exontrol.edit"
.Refresh
End With
End Function
</SCRIPT>
</BODY>
|
|
31
|
How do I call your x-script language
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.ExecuteTemplate "BackColor = RGB(255,0,0)"
End With
End Function
</SCRIPT>
</BODY>
|
|
30
|
How do I call your x-script language
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.Template = "BackColor = RGB(255,0,0)"
End With
End Function
</SCRIPT>
</BODY>
|
|
29
|
Can I change the font for the tooltip
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.ToolTipDelay = 1
With .ToolTipFont
.Name = "Tahoma"
.Size = 14
End With
.ToolTipWidth = 364
.AddKeyword "<b>class</b>","this is a bit of text that's shown when the cursor hovers the <b>class</b> keyword.","exontrol.edit"
.Refresh
End With
End Function
</SCRIPT>
</BODY>
|
|
28
|
I've seen that the width of the tooltip is variable. Can I make it larger
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.ToolTipWidth = 328
.AddKeyword "<b>class</b>","this is a bit of text that's shown when the cursor hovers the <b>class</b> keyword.","exontrol.edit"
.Refresh
End With
End Function
</SCRIPT>
</BODY>
|
|
27
|
How do I let the tooltip being displayed longer
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.ToolTipPopDelay = 10000
.AddKeyword "<b>class</b>","this is a bit of text that's shown when the cursor hovers the <b>class</b> keyword.","exontrol.edit"
.Refresh
End With
End Function
</SCRIPT>
</BODY>
|
|
26
|
How do I disable showing the tooltip for all control
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.ToolTipDelay = 0
.AddKeyword "<b>class</b>","this is a bit of text that's shown when the cursor hovers the <b>class</b> keyword.","exontrol.edit"
.Refresh
End With
End Function
</SCRIPT>
</BODY>
|
|
25
|
How do I show the tooltip quicker
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.ToolTipDelay = 1
.AddKeyword "<b>class</b>","this is a bit of text that's shown when the cursor hovers the <b>class</b> keyword.","exontrol.edit"
.Refresh
End With
End Function
</SCRIPT>
</BODY>
|
|
24
|
Can I change the order of the buttons in the scroll bar
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.ScrollOrderParts(1) = "t,l,r"
.ScrollOrderParts(0) = "t,l,r"
End With
End Function
</SCRIPT>
</BODY>
|
|
23
|
The thumb size seems to be very small. Can I make it bigger
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.ScrollThumbSize(1) = 164
End With
End Function
</SCRIPT>
</BODY>
|
|
22
|
How do I enlarge or change the size of the control's scrollbars
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.ScrollHeight = 18
.ScrollWidth = 18
.ScrollButtonWidth = 18
.ScrollButtonHeight = 18
End With
End Function
</SCRIPT>
</BODY>
|
|
21
|
How can I display my text on the scroll bar, using a different font
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.ScrollPartCaption(1,256) = "This is just a text"
.ScrollFont(1).Size = 12
.ScrollThumbSize(1) = 128
.ScrollHeight = 24
.ScrollPartCaption(1,256) = "This is <s><font Tahoma;12> just </font></s> text"
.ScrollHeight = 20
End With
End Function
</SCRIPT>
</BODY>
|
|
20
|
How can I display my text on the scroll bar
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.ScrollPartCaption(1,256) = "this is just a text"
.ScrollThumbSize(1) = 96
End With
End Function
</SCRIPT>
</BODY>
|
|
19
|
How do I assign a tooltip to a scrollbar
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.VisualAppearance.Add 1,"c:\exontrol\images\normal.ebn"
.ScrollToolTip(1) = "This is a <img>0x1000000</img>tooltip being shown when you click and drag the thumb in the horizontal scroll bar"
End With
End Function
</SCRIPT>
</BODY>
|
|
18
|
How do I assign an icon to the button in the scrollbar
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.Images "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTq" & _
"lVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m" & _
"0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/y" & _
"NAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA="
.ScrollPartVisible(1,32768) = True
.ScrollPartCaption(1,32768) = "<img>1</img>"
.ScrollHeight = 18
.ScrollButtonWidth = 18
End With
End Function
</SCRIPT>
</BODY>
|
|
17
|
I need to add a button in the scroll bar. Is this possible
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.ScrollPartVisible(1,32768) = True
.ScrollPartCaption(1,32768) = "1"
End With
End Function
</SCRIPT>
</BODY>
|
|
16
|
Can I display an additional buttons in the scroll bar
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.ScrollPartVisible(1,32768) = True
.ScrollPartVisible(1,16384) = True
.ScrollPartVisible(1,1) = True
.ScrollPartVisible(1,2) = True
End With
End Function
</SCRIPT>
</BODY>
|
|
15
|
How do I change the control's foreground color
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.ForeColor = RGB(255,0,0)
End With
End Function
</SCRIPT>
</BODY>
|
|
14
|
How do I change the control's background color
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.BackColor = RGB(200,200,200)
End With
End Function
</SCRIPT>
</BODY>
|
|
13
|
How can I change the control's font
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.Font.Name = "Verdana"
End With
End Function
</SCRIPT>
</BODY>
|
|
12
|
How do I put a picture on the center of the control
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.Picture = Edit1.ExecuteTemplate("loadpicture(`c:\exontrol\images\zipdisk.gif`)")
.PictureDisplay = 17
End With
End Function
</SCRIPT>
</BODY>
|
|
11
|
How do I resize/stretch a picture on the control's background
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.Picture = Edit1.ExecuteTemplate("loadpicture(`c:\exontrol\images\zipdisk.gif`)")
.PictureDisplay = 49
End With
End Function
</SCRIPT>
</BODY>
|
|
10
|
How do I put a picture on the control's center right bottom side
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.Picture = Edit1.ExecuteTemplate("loadpicture(`c:\exontrol\images\zipdisk.gif`)")
.PictureDisplay = 34
End With
End Function
</SCRIPT>
</BODY>
|
|
9
|
How do I put a picture on the control's center left bottom side
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.Picture = Edit1.ExecuteTemplate("loadpicture(`c:\exontrol\images\zipdisk.gif`)")
.PictureDisplay = 32
End With
End Function
</SCRIPT>
</BODY>
|
|
8
|
How do I put a picture on the control's center top side
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.Picture = Edit1.ExecuteTemplate("loadpicture(`c:\exontrol\images\zipdisk.gif`)")
.PictureDisplay = 1
End With
End Function
</SCRIPT>
</BODY>
|
|
7
|
How do I put a picture on the control's right top corner
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.Picture = Edit1.ExecuteTemplate("loadpicture(`c:\exontrol\images\zipdisk.gif`)")
.PictureDisplay = 2
End With
End Function
</SCRIPT>
</BODY>
|
|
6
|
How do I put a picture on the control's left top corner
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.Picture = Edit1.ExecuteTemplate("loadpicture(`c:\exontrol\images\zipdisk.gif`)")
.PictureDisplay = 0
End With
End Function
</SCRIPT>
</BODY>
|
|
5
|
How do I put a picture on the control's background
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.Picture = Edit1.ExecuteTemplate("loadpicture(`c:\exontrol\images\zipdisk.gif`)")
End With
End Function
</SCRIPT>
</BODY>
|
|
4
|
How do I change the control's border, using your EBN files
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.VisualAppearance.Add 1,"c:\exontrol\images\normal.ebn"
.Appearance = 16777216 ' &H1000000
End With
End Function
</SCRIPT>
</BODY>
|
|
3
|
How do I remove the control's border
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.Appearance = 0
End With
End Function
</SCRIPT>
</BODY>
|
|
2
|
How can I add a line
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.InsertText " - insert the line as the last - \r\n"
End With
End Function
</SCRIPT>
</BODY>
|
|
1
|
How can I insert a line
<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>
<SCRIPT LANGUAGE="VBScript">
Function Init()
With Edit1
.InsertText " - insert the line as the first - \r\n",1
End With
End Function
</SCRIPT>
</BODY>
|